(file-name-buffer-file-type-alist): Define for compiler.

diff --git a/lisp/mail/feedmail.el b/lisp/mail/feedmail.el
index 4ebd2a19b42b423109022d58b9a488f70df2d5a5..2449adb5ee732cbb6803ef41b76f5181e2c9606e 100644 (file)
--- a/lisp/mail/feedmail.el
+++ b/lisp/mail/feedmail.el
@@ -1521,6 +1521,9 @@ bail out with an appropriate answer to the global confirmation prompt."
   (interactive "p")
   (let ((feedmail-queue-runner-confirm-global t)) (feedmail-run-the-queue arg)))
 
+;; letf fools the byte-compiler.
+(defvar file-name-buffer-file-type-alist)
+
 ;;;###autoload
 (defun feedmail-run-the-queue (&optional arg)
   "Visit each message in the feedmail queue directory and send it out.